/* oneColor - all one color
 */


surface
oneColor (color theOneColor = color "rgb" (.4, 0, .6) )
{
    Oi = Os;  
    Ci = Oi * theOneColor; 
}
